

'   vpeek - v_value= vpeek (v_address) 
'   ld hl,v_address
'   call 0x004A    #-rdvrm
'   ld v_value,a

